@dimodd @dimeven @side

@ig=

@nextpoint @currentpoint @nextpoint=1

@page @pagecount @pagecount=0

@makecol=makecol

@history @spanlist @currentlist

@write @read @write=changebar.cb

@document=@dimodd= @dimeven= @dimodd by @dimeven by @side @dimodd by - @dimeven by @dimeven by @sidefalse @dimeven by - @dimodd by @dimodd by @sidetrue @document@write @read=changebar.cb

@enddocument@history @read@read=changebar.cbwrite=n@lcheckHistory @enddocument

@endfloat=@history @read =-1@read totemp @history@historytemp empty@currentpoint=@page=0 @carcdr@currentlist@currentpoint= @currentpoint n@page ptempdima l@currentlisttempdima=tempdima currbox @currentpoint=@nextpoint tempdima=
cb@ig @currentpoint n@page ptempdima l@currentlist tempcntatempcnta by2@ig @currentpoint to 0pt-tempcntatempcnta by2@ig @currentpoint @currentpoint@ig tempdima@ig =0@tempuxout \immediatewrite@pagecountp@ig @temp@nextpoint by 4@ig @nextpoint>80 @nextpoint=1@tempdimacurrbox@history @read =-1@read totemp @history@historytemp empty@currentpoint=@page=0 @carcdr@currentlist @currentpoint= tempcnta=tempcnta by1@ig @twosidetempcntb= tempcntb by39=9 by2@ig @currentpoint @currentpoint by1@currentpoint@ig tempdima@ig =0@tempuxout \immediatewrite@pagecountp@ig @temp @endfloat

=@history @read =-1@read totemp @history@historytemp empty@currentpoint=@page=0 @carcdr@currentlist@currentpoint= @currentpoint n@page ptempdima l@currentlisttempdima=tempdima currbox @currentpoint=@nextpoint tempdima=
cb@ig @currentpoint n@page ptempdima l@currentlist tempcntatempcnta by2@ig @currentpoint to 0pt-tempcntatempcnta by2@ig @currentpoint @currentpoint@ig tempdima@ig =0@tempuxout \immediatewrite@pagecountp@ig @temp@nextpoint by 4@ig @nextpoint>80 @nextpoint=1@tempdimacurrbox@history @read =-1@read totemp @history@historytemp empty@currentpoint=@page=0 @carcdr@currentlist @currentpoint= tempcnta=tempcnta by1@ig @twosidetempcntb= tempcntb by39=9 by2@ig @currentpoint @currentpoint by1@currentpoint@ig tempdima@ig =0@tempuxout \immediatewrite@pagecountp@ig @temp @endfloat=@history @read =-1@read totemp @history@historytemp empty@currentpoint=@page=0 @carcdr@currentlist@currentpoint= @currentpoint n@page ptempdima l@currentlisttempdima=tempdima currbox @currentpoint=@nextpoint tempdima=
cb@ig @currentpoint n@page ptempdima l@currentlist tempcntatempcnta by2@ig @currentpoint to 0pt-tempcntatempcnta by2@ig @currentpoint @currentpoint@ig tempdima@ig =0@tempuxout \immediatewrite@pagecountp@ig @temp@nextpoint by 4@ig @nextpoint>80 @nextpoint=1@tempdimacurrbox@history @read =-1@read totemp @history@historytemp empty@currentpoint=@page=0 @carcdr@currentlist @currentpoint= tempcnta=tempcnta by1@ig @twosidetempcntb= tempcntb by39=9 by2@ig @currentpoint @currentpoint by1@currentpoint@ig tempdima@ig =0@tempuxout \immediatewrite@pagecountp@ig @temp @endfloat

@footnote=footnotetext

@mpfootnote=mpfootnotetext